home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 / Aminet - June 1993 [Walnut Creek].iso / ab20 / utilitys / editors / emacs185.lha / emacs / .emacs-menu-src next >
Encoding:
Text File  |  1992-01-21  |  1.4 KB  |  40 lines
  1. (amiga-menus-set
  2.  (list 
  3.   (list "Project" (menu-items '(("Open" find-file ?O)
  4.                 ("Save" save-buffer ?S)
  5.                 ("Save As" write-file ?W)
  6.                 ()
  7.                 ("Quit" check-exit ?Q))))
  8.   (list "Window" (menu-items '(("Split" split-window-vertically ?2)
  9.                    ("Split H" split-window-horizontally)
  10.                    ()
  11.                    ("One Window" delete-other-windows ?1)
  12.                    ("Delete" delete-window ?0)
  13.                    ()
  14.                    ("Enlarge" enlarge-window ?E)
  15.                    ("Next" other-window ?N))))
  16.   (list "Buffers" (menu-items '(("List" list-buffers)
  17.                 ("Change" switch-to-buffer)
  18.                 ("Kill" kill-buffer))))
  19.   (list "Edit" (menu-items '(("Undo" undo ?U)
  20.                  ()
  21.                  ("Mark" set-mark-command)
  22.                  ("Cut" kill-region ?X)
  23.                  ("Copy" copy-region-as-kill ?C)
  24.                  ("Paste" yank ?V)
  25.                  ("Paste Previous" yank-pop))))
  26.   (list "Search" (menu-items '(("Find Forward" isearch-forward ?F)
  27.                    ("Find Backward" isearch-backward ?B)
  28.                    ()
  29.                    ("Find Fwd Regexp" isearch-forward-regexp)
  30.                    ("Find Bwd Regexp" isearch-backward-regexp)
  31.                    ()
  32.                    ("Query Replace" query-replace ?R)
  33.                    ("Query Rpl Regexp" query-replace-regexp))))
  34.   (list "Help" (menu-items '(("Tutorial" help-with-tutorial ?T)
  35.                  ("Information" info ?H)
  36.                  ()
  37.                  ("Where Is Command" where-is)
  38.                  ("What Is Command" describe-function)
  39.                  ("What Is Key" describe-key)
  40.                  ("Apropos" command-apropos))))))